home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Collections: Purity
/
Purity #21 (1994-01-12)(Diesel)(DE)[WB].zip
/
Purity #21 (1994-01-12)(Diesel)(DE)[WB].adf
/
GadgetWorkshop
/
intuition.lib
< prev
next >
Wrap
Text File
|
1994-01-12
|
8KB
|
142 lines
{$if not def INTUITION_LIB} CONST INTUITION_LIB=0;
{ ****************************************************************
** KickPascal-Include-Datei "intuition.lib" zu Kickstart 2.04 **
****************************************************************
** berichtigt 11.06.92 **
**************************************************************** }
{$if not def INTUITION_INTUITION_H;incl "intuition/intuition.h";endif}
{$if not def INTUITION_CLASSES_H;incl "intuition/classes.h";endif}
VAR IntuitionBase : Ptr; { früher "IntBase" }
LIBRARY IntuitionBase :
-30 : PROCEDURE OpenIntuition;
-36 : PROCEDURE _Intuition(A0:p_InputEvent);
-42 : FUNCTION AddGadget(A0:p_Window; A1:p_Gadget; D0:Long): Word;
-48 : FUNCTION ClearDMRequest(A0:p_Window): Boolean;
-54 : PROCEDURE ClearMenuStrip(A0:p_Window);
-60 : PROCEDURE ClearPointer(A0:p_Window);
-66 : FUNCTION CloseScreen(A0:p_Screen): Boolean;
-72 : PROCEDURE CloseWindow(A0:p_Window);
-78 : FUNCTION CloseWorkBench: LongInt;
-84 : PROCEDURE CurrentTime(A0,A1:Ptr);
-90 : FUNCTION DisplayAlert(D0:Long; A1:Str; D1:Long): Boolean;
-96 : PROCEDURE DisplayBeep(A0:p_Screen);
-102 : FUNCTION DoubleClick(D0,D1,D2,D3: Long): Boolean;
-108 : PROCEDURE DrawBorder(A0:p_RastPort; A1:p_Border; D0,D1:LongInt);
-114 : PROCEDURE DrawImage(A0:p_RastPort; A1:p_Image; D0,D1:LongInt);
-120 : PROCEDURE EndRequest(A0:p_Requester; A1:p_Window);
-126 : FUNCTION GetDefPrefs(A0:p_Preferences; D0:LongInt): p_Preferences;
-132 : FUNCTION GetPrefs(A0:p_Preferences; D0:LongInt): p_Preferences;
-138 : PROCEDURE InitRequester(A0:p_Requester);
-144 : FUNCTION ItemAddress(A0:p_Menu; D0:Long): p_MenuItem;
-150 : FUNCTION ModifyIDCMP(A0:p_Window; D0:Long): Boolean;
-156 : PROCEDURE ModifyProp(A0:p_Gadget; A1:p_Window; A2:p_Requester; D0,D1,D2,D3,D4:Long)
-162 : PROCEDURE MoveScreen(A0:p_Screen; D0,d1:LongInt);
-168 : PROCEDURE MoveWindow(A0:p_Window; D0,d1:LongInt);
-174 : PROCEDURE OffGadget(A0:p_Gadget; A1:p_Window; A2:p_Requester);
-180 : PROCEDURE OffMenu(A0:p_Window; D0:Long);
-186 : PROCEDURE OnGadget(A0:p_Gadget; A1:p_Window; A2:p_Requester);
-192 : PROCEDURE OnMenu(A0:p_Window; D0:Long);
-198 : FUNCTION OpenScreen(A0:p_NewScreen): p_Screen;
-204 : FUNCTION OpenWindow(A0:p_NewWindow): p_Window;
-210 : FUNCTION OpenWorkBench : Boolean;
-216 : PROCEDURE PrintIText(A0:p_RastPort; A1:p_IntuiText; D0,D1:LongInt);
-222 : PROCEDURE RefreshGadgets(A0:p_Gadget; A1:p_Window; A2:p_Requester);
-228 : FUNCTION RemoveGadget(A0:p_Window, A1:p_Gadget): Word;
-234 : PROCEDURE ReportMouse(D0:LongInt; A0:p_Window);
-234 : PROCEDURE ReportMouse1(A0:p_Window; D0:LongInt);
-240 : FUNCTION Request(A0:p_Requester; A1:p_Window): Boolean;
-246 : PROCEDURE ScreenToBack(A0:p_Screen);
-252 : PROCEDURE ScreenToFront(A0:p_Screen);
-258 : FUNCTION SetDMRequest(A0:p_Window; A1:p_Requester): Boolean;
-264 : FUNCTION SetMenuStrip(A0:p_Window; A1:p_Menu): Boolean;
-270 : PROCEDURE SetPointer(A0:p_Window; A1:Ptr; D0,D1,D2,D3:LongInt);
-276 : PROCEDURE SetWindowTitles(A0:p_Window; A1,A2:Str);
-282 : PROCEDURE ShowTitle(A0:p_Screen; D0:LongInt);
-288 : PROCEDURE SizeWindow(A0:p_Window; D0,D1:LongInt);
-294 : FUNCTION ViewAddress: p_View;
-300 : FUNCTION ViewPortAddress(A0:p_Window): p_ViewPort;
-306 : PROCEDURE WindowToBack(A0:p_Window);
-312 : PROCEDURE WindowToFront(A0:p_Window);
-318 : FUNCTION WindowLimits(A0:p_Window; D0,D1:Long; D2,D3:Long): Boolean;
-324 : FUNCTION SetPrefs(A0:p_Preferences; D0,D1:LongInt): p_Preferences;
-330 : FUNCTION IntuiTextLength(A0:p_IntuiText): LongInt;
-336 : FUNCTION WBenchToBack: Boolean;
-342 : FUNCTION WBenchToFront: Boolean;
-348 : FUNCTION AutoRequest(A0:p_Window; A1,A2,A3:p_IntuiText; D0,D1,D2,D3:Long): Boolean;
-354 : PROCEDURE BeginRefresh(A0:p_Window);
-360 : FUNCTION BuildSysRequest(A0:p_Window; A1,A2,A3:p_IntuiText; D0,D1,D2:Long): p_Window;
-366 : PROCEDURE EndRefresh(A0:p_Window; D0:LongInt);
-372 : PROCEDURE FreeSysRequest(A0:p_Window);
-378 : PROCEDURE MakeScreen(A0:p_Screen);
-384 : PROCEDURE RemakeDisplay;
-390 : PROCEDURE RethinkDisplay;
-396 : FUNCTION AllocRemember(A0:Ptr; D0,D1:Long): Ptr;
-402 : PROCEDURE AlohaWorkbench(D0:LongInt);
-408 : PROCEDURE FreeRemember(A0:Ptr; D0:LongInt);
-414 : FUNCTION LockIBase(D0:LongInt): Long;
-420 : PROCEDURE UnlockIBase(A0:LongInt);
{ --- Routinen ab V33 - Kickstart Release 1.2 --- }
-426 : FUNCTION GetScreenData(A0:Ptr; D0,D1:Long; A1:p_Screen): LongInt;
-432 : PROCEDURE RefreshGList(A0:p_Gadget; A1:p_Window; A2:p_Requester; D0:LongInt);
-438 : FUNCTION AddGList(A0:p_Window, A1:p_Gadget; D0:Long; D1:LongInt; A2:p_Requester): Word;
-444 : FUNCTION RemoveGList(A0:p_Window; A1:p_Gadget; D0:LongInt): Word;
-450 : FUNCTION ActivateWindow(A0:p_Window): LongInt;
-456 : PROCEDURE RefreshWindowFrame(A0:p_Window);
-462 : FUNCTION ActivateGadget(A0:p_Gadget; A1:p_Window; A2:p_Requester): Boolean;
-468 : PROCEDURE NewModifyProp(A0:p_Gadget; A1:p_Window; A2:p_Requester; D0,D1,D2,D3,D4: Long; D5:LongInt)
{ --- Routinen ab V36 - Kickstart Release 2.0 --- }
-474 : FUNCTION QueryOverscan(A0:Long; A1:p_Rectangle; D0:LongInt): LongInt;
-480 : PROCEDURE MoveWindowInFrontOf(A0,A1:p_Window);
-486 : PROCEDURE ChangeWindowBox(A0:p_Window; D0,D1,D2,D3: LongInt);
-492 : FUNCTION SetEditHook(A0:p_Hook): p_Hook;
-498 : FUNCTION SetMouseQueue(A0:p_Window; D0:Long): LongInt;
-504 : PROCEDURE ZipWindow(A0:p_Window);
-510 : FUNCTION LockPubScreen(A0:Str): p_Screen;
-516 : PROCEDURE UnlockPubScreen(A0:Str; A1:p_Screen);
-522 : FUNCTION LockPubScreenList: p_List;
-528 : PROCEDURE UnlockPubScreenList;
-534 : FUNCTION NextPubScreen(A0:p_Screen; A1:Str): Str;
-540 : PROCEDURE SetDefaultPubScreen(A0:Str);
-546 : FUNCTION SetPubScreenModes(D0:Long): Word;
-552 : FUNCTION PubScreenStatus(A0:p_Screen; D0:Long): Word;
-558 : FUNCTION ObtainGIRPort(A0:p_GadgetInfo): p_RastPort;
-564 : PROCEDURE ReleaseGIRPort(A0:p_RastPort);
-570 : PROCEDURE GadgetMouse(A0:P_Gadget; A1:P_GadgetInfo; a2:Ptr);
{ ** private Routine ** }
-582 : PROCEDURE GetDefaultPubScreen(A0:Str);
-588 : FUNCTION EasyRequestArgs(A0:p_Window; A1:p_EasyStruct; A2:Ptr; A3:Ptr): LongInt;
-594 : FUNCTION BuildEasyRequestArgs(A0:p_Window; A1:p_EasyStruct; D0:Long; A3:Ptr): p_Window;
-600 : FUNCTION SysReqHandler(A0:p_Window; A1:Ptr; D0:LongInt): LongInt;
-606 : FUNCTION OpenWindowTagList(A0:p_NewWindow; A1:p_TagItem): p_Window;
-612 : FUNCTION OpenScreenTagList(A0:p_NewScreen; A1:p_TagItem): p_Screen;
-618 : PROCEDURE DrawImageState(A0:p_RastPort; A1:p_Image; D0,D1:LongInt; D2:Long; A2:p_DrawInfo);
-624 : FUNCTION PointInImage(D0:Long; A0:p_Image): Boolean;
-630 : PROCEDURE EraseImage(A0:p_RastPort; A1:p_Image; D0,D1:LongInt);
-636 : FUNCTION NewObjectA(A0:p_IClass; A1:Ptr; A2:p_TagItem): Ptr;
-642 : PROCEDURE DisposeObject(A0:Ptr);
-648 : FUNCTION SetAttrsA(A0:Ptr; A1:p_TagItem): Long;
-654 : FUNCTION GetAttr(D0:Long; A0,A1: Ptr): Long;
-660 : FUNCTION SetGadgetAttrsA(A0:p_Gadget; A1:p_Window; A2:p_Requester; A3:p_TagItem) : Long;
-666 : FUNCTION NextObject(A0:Ptr): Ptr;
{ ** private Routine ** }
-678 : FUNCTION MakeClass(A0,A1:Ptr; A2:IClass; D0,D1:Long): p_IClass;
-684 : PROCEDURE AddClass(A0:p_IClass);
-690 : FUNCTION GetScreenDrawInfo(A0:p_Screen): p_DrawInfo;
-696 : PROCEDURE FreeScreenDrawInfo(A0:p_Screen; A1:p_DrawInfo);
-702 : FUNCTION ResetMenuStrip(A0:p_Window; A1: p_Menu): Boolean;
-708 : PROCEDURE RemoveClass(A0:p_IClass);
-714 : FUNCTION FreeClass(A0:p_IClass): Boolean;
{ ** private Routinen ** }
END;
{$endif}